home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Tele / D-F / FSP Control3 < prev    next >
Text File  |  1988-12-26  |  4KB  |  148 lines
  1. CLEAR; clear memory
  2. LIST "6" ; when FSP is run, list as it runs & show memory
  3. ***
  4. DEFINEMACRO "PROCESS" ; Define a Macro that will save some typing
  5. CLEAR
  6. LOAD "@1" 
  7. PURGE
  8. CHECKPATH/DELETE "HD"
  9. PURGE
  10. SAVE "@1"
  11. ENDMACRO
  12. ***
  13. *
  14. PROCESS "HD:Sections:NEW files" ; Do the Macro "process" as defined
  15. MOVE "HD:Files:NEW files Folder" ; moves files to the ...New files Folder
  16. PROCESS "HD:Sections:NEW files" ; Do the Macro in case path changed
  17. SAVE "HD:Sections:BU NEW files" ; Save a backup of the file section
  18. *
  19. PROCESS "HD:Sections:LIBRARY files"
  20. MOVE "HD:Files:LIBRARY files Folder"
  21. PROCESS "HD:Sections:LIBRARY files" 
  22. SAVE "HD:Sections:BU LIBRARY files"
  23. *
  24. PROCESS "HD:Sections:APPLE files"
  25. MOVE "HD:Files:APPLE files Folder"
  26. PROCESS "HD:Sections:APPLE files"
  27. SAVE "HD:Sections:BU APPLE files"
  28. *
  29. PROCESS "HD:Sections:ART files"
  30. MOVE "HD:Files:ART files Folder"
  31. PROCESS "HD:Sections:ART files"
  32. SAVE "HD:Sections:BU ART files"
  33. *
  34. PROCESS "HD:Sections:COMM files"
  35. MOVE "HD:Files:COMM files Folder"
  36. PROCESS "HD:Sections:COMM files"
  37. SAVE "HD:Sections:BU COMM files"
  38. *
  39. PROCESS "HD:Sections:INFO files"
  40. MOVE "HD:Files:INFO files Folder"
  41. PROCESS "HD:Sections:INFO files" 
  42. SAVE "HD:Sections:BU INFO files"
  43. *
  44. PROCESS "HD:Sections:DA & FKEY files"
  45. MOVE "HD:Files:DA & FKEY files Folder"
  46. PROCESS "HD:Sections:DA & FKEY files" 
  47. SAVE "HD:Sections:BU DA & FKEY files"
  48. *
  49. PROCESS "HD:Sections:FONT files"
  50. MOVE "HD:Files:FONT files Folder"
  51. PROCESS "HD:Sections:FONT files" 
  52. SAVE "HD:Sections:BU FONT files"
  53. *
  54. PROCESS "HD:Sections:GAME files"
  55. MOVE "HD:Files:GAMES files Folder"
  56. PROCESS "HD:Sections:GAME files" 
  57. SAVE "HD:Sections:BU GAMES files"
  58. *
  59. PROCESS "HD:Sections:INIT & CDEV files"
  60. MOVE "HD:Files:INIT & CDEV files Folder"
  61. PROCESS "HD:Sections:INIT & CDEV files" 
  62. SAVE "HD:Sections:BU INIT & CDEV files"
  63. *
  64. PROCESS "HD:Sections:SOUND files"
  65. MOVE "HD:Files:SOUND files Folder"
  66. PROCESS "HD:Sections:SOUND files"
  67. SAVE "HD:Sections:BU SOUND files"
  68. *
  69. PROCESS "HD:Sections:STACK files"
  70. MOVE "HD:Files:STACK files Folder"
  71. PROCESS "HD:Sections:STACK files"
  72. SAVE "HD:Sections:BU STACK files"
  73. * 
  74. PROCESS "HD:Sections:TOOL files"
  75. MOVE "HD:Files:TOOL files Folder"
  76. PROCESS "HD:Sections:TOOL files" 
  77. SAVE "HD:Sections:BU TOOL files"
  78. * 
  79. PROCESS "HD:Sections:SYSOP files"
  80. MOVE "HD:Files:SYSOP files Folder"
  81. PROCESS "HD:Sections:SYSOP files" 
  82. SAVE "HD:Sections:BU SYSOP files"
  83. ***
  84. *** This creates a text listing of all files
  85. CLEAR
  86. ADD "HD:Sections:APPLE files"
  87. ADD "HD:Sections:ART files"
  88. ADD "HD:Sections:COMM files"
  89. ADD "HD:Sections:INFO files"
  90. ADD "HD:Sections:DA & FKEY files"
  91. ADD "HD:Sections:FONT files"
  92. ADD "HD:Sections:GAME files"
  93. ADD "HD:Sections:INIT & CDEV files"
  94. ADD "HD:Sections:SOUND files"
  95. ADD "HD:Sections:STACK files"
  96. ADD "HD:Sections:TOOL files"
  97. ADD "HD:Sections:SYSOP files"
  98. SORT/DATE
  99. FORMAT "CR:COL:3+'Title:'+TI+COL:30+'Times Downloaded:'+DL:CR"
  100. FORMAT "+COL:4+'Size:'+SIZEK+COL:35+'Uploaded by:'+UPL:CR"
  101. FORMAT "+COL:4+'Date:'+DA+COL:41+'Where:'+SE:CR+0+DESCA"
  102. SAVETEXT/FORMAT "HD:BBS:ALL FILES"
  103. ***
  104. ***This creates a text listing of all files added within the last 10
  105. ***days
  106. CLEAR
  107. ADD "HD:Sections:APPLE files"
  108. ADD "HD:Sections:ART files"
  109. ADD "HD:Sections:COMM files"
  110. ADD "HD:Sections:INFO files"
  111. ADD "HD:Sections:DA & FKEY files"
  112. ADD "HD:Sections:FONT files"
  113. ADD "HD:Sections:GAME files"
  114. ADD "HD:Sections:INIT & CDEV files"
  115. ADD "HD:Sections:SOUND files"
  116. ADD "HD:Sections:STACK files"
  117. ADD "HD:Sections:TOOL files"
  118. ADD "HD:Sections:SYSOP files"
  119. SORT/DATE
  120. DELETE/AGE "10"
  121. PURGE
  122. FORMAT "CR:COL:3+'Title:'+TI+COL:30+'Times Downloaded:'+DL:CR"
  123. FORMAT "+COL:4+'Size:'+SIZEK+COL:35+'Uploaded by:'+UPL:CR"
  124. FORMAT "+COL:4+'Date:'+DA+COL:41+'Where:'+SE:CR+0+DESCA"
  125. SAVETEXT/FORMAT "HD:BBS:NEW FILES"
  126. ***
  127. *** This creates a text listing of all files, sorted by the times the
  128. ***file was downloaded
  129. CLEAR
  130. ADD "HD:Sections:APPLE files"
  131. ADD "HD:Sections:ART files"
  132. ADD "HD:Sections:COMM files"
  133. ADD "HD:Sections:INFO files"
  134. ADD "HD:Sections:DA & FKEY files"
  135. ADD "HD:Sections:FONT files"
  136. ADD "HD:Sections:GAME files"
  137. ADD "HD:Sections:INIT & CDEV files"
  138. ADD "HD:Sections:SOUND files"
  139. ADD "HD:Sections:STACK files"
  140. ADD "HD:Sections:TOOL files"
  141. ADD "HD:Sections:SYSOP files"
  142. SORT/DLCNT
  143. PURGE
  144. FORMAT "CR:0+'Title:'+TI:CR+0+'Downloads:'+DL:CR+0+'Uploaded by:'+UPL"
  145. SAVETEXT/FORMAT "HD:BBS:FILES BY DL"
  146. ***
  147. LAUNCH "HD:BBS:Red Ryder Host" ; launch Red Ryder Host
  148.